home *** CD-ROM | disk | FTP | other *** search
- object MainFrm: TMainFrm
- Left = 248
- Top = 150
- BorderIcons = []
- BorderStyle = bsSingle
- Caption = 'Setup Sound System Wizard'
- ClientHeight = 308
- ClientWidth = 417
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- Position = poScreenCenter
- OnShow = FormShow
- CaptionFont.Charset = ANSI_CHARSET
- CaptionFont.Color = clWindowText
- CaptionFont.Height = -11
- CaptionFont.Name = 'MS Sans Serif'
- CaptionFont.Style = [fsBold]
- UseSystemCaptionFont = True
- GradientStartColor = clActiveCaption
- GradientInactiveStartColor = clInactiveCaption
- PixelsPerInch = 96
- TextHeight = 13
- object PageControl1: TPageControl
- Left = 0
- Top = 0
- Width = 417
- Height = 308
- ActivePage = TabSheet5
- Align = alClient
- TabOrder = 0
- object TabSheet1: TTabSheet
- Caption = 'TabSheet1'
- TabVisible = False
- object Label1: TLabel
- Left = 155
- Top = 10
- Width = 230
- Height = 48
- AutoSize = False
- Caption =
- 'Please close all other programs that play or record sound, and c' +
- 'lick '#39'Next >'#39' to continue.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Bevel5: TBevel
- Left = 8
- Top = 245
- Width = 393
- Height = 7
- Shape = bsBottomLine
- end
- object Next1: TButton
- Left = 236
- Top = 264
- Width = 75
- Height = 25
- Caption = 'Next >'
- Default = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = Next1Click
- end
- object Back1: TButton
- Left = 160
- Top = 264
- Width = 75
- Height = 25
- Caption = '< Back'
- Enabled = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- end
- object Cancel1: TButton
- Left = 322
- Top = 264
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 2
- OnClick = Cancel1Click
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'TabSheet2'
- TabVisible = False
- object Label2: TLabel
- Left = 155
- Top = 10
- Width = 230
- Height = 80
- AutoSize = False
- Caption =
- 'You should check to make sure your microphone and speakers are c' +
- 'onnected to your sound card. Please click '#39'Next >'#39' to adjust yo' +
- 'ur playback volume.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Bevel1: TBevel
- Left = 8
- Top = 245
- Width = 393
- Height = 7
- Shape = bsBottomLine
- end
- object Back2: TButton
- Left = 160
- Top = 264
- Width = 75
- Height = 25
- Caption = '< Back'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = Back2Click
- end
- object Next2: TButton
- Left = 236
- Top = 264
- Width = 75
- Height = 25
- Caption = 'Next >'
- Default = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = Next2Click
- end
- object Cancel2: TButton
- Left = 322
- Top = 264
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 2
- OnClick = Cancel1Click
- end
- end
- object TabSheet3: TTabSheet
- Caption = 'TabSheet3'
- TabVisible = False
- object Label3: TLabel
- Left = 155
- Top = 10
- Width = 230
- Height = 32
- AutoSize = False
- Caption =
- 'When you are finished adjusting the playback volume please click' +
- ' '#39'Next >'#39'.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object MeterTxt: TLabel
- Left = 172
- Top = 208
- Width = 85
- Height = 16
- Caption = 'Intensity Meter'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object VolumeTxt: TLabel
- Left = 272
- Top = 208
- Width = 91
- Height = 16
- Caption = 'Volume Control'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label7: TLabel
- Left = 328
- Top = 80
- Width = 20
- Height = 13
- Caption = 'Max'
- end
- object Label8: TLabel
- Left = 330
- Top = 190
- Width = 17
- Height = 13
- Caption = 'Min'
- end
- object Bevel2: TBevel
- Left = 8
- Top = 245
- Width = 393
- Height = 7
- Shape = bsBottomLine
- end
- object TrackBar1: TTrackBar
- Left = 292
- Top = 73
- Width = 33
- Height = 136
- Orientation = trVertical
- Frequency = 4000
- Position = 0
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = TrackBar1Change
- end
- object LedLadder1: TLedLadder
- Left = 202
- Top = 80
- Width = 21
- Height = 120
- LedCount = 15
- Min = 0
- Position = 0
- end
- object Back3: TButton
- Left = 160
- Top = 264
- Width = 75
- Height = 25
- Caption = '< Back'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = Back3Click
- end
- object Next3: TButton
- Left = 236
- Top = 264
- Width = 75
- Height = 25
- Caption = 'Next >'
- Default = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- OnClick = Next3Click
- end
- object Cancel3: TButton
- Left = 322
- Top = 264
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 4
- OnClick = Cancel1Click
- end
- end
- object TabSheet4: TTabSheet
- Caption = 'TabSheet4'
- TabVisible = False
- object Label42: TLabel
- Left = 218
- Top = 114
- Width = 175
- Height = 103
- AutoSize = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clNavy
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- WordWrap = True
- end
- object Label4: TLabel
- Left = 155
- Top = 220
- Width = 85
- Height = 16
- Caption = 'Intensity Meter'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Bevel3: TBevel
- Left = 8
- Top = 245
- Width = 393
- Height = 7
- Shape = bsBottomLine
- end
- object Label11: TLabel
- Left = 155
- Top = 10
- Width = 240
- Height = 99
- AutoSize = False
- Caption =
- 'After your hear the beep, please repeat the phrase below without' +
- ' pausing into your microphone. Please note: You will probably re' +
- 'peat the phrase 3 to 7 times before the '#39'Next >'#39' push button is ' +
- 'enabled.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- Transparent = True
- WordWrap = True
- end
- object Back4: TButton
- Left = 160
- Top = 264
- Width = 75
- Height = 25
- Caption = '< Back'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = Back4Click
- end
- object Next4: TButton
- Left = 236
- Top = 264
- Width = 75
- Height = 25
- Caption = 'Next >'
- Default = True
- Enabled = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = Next4Click
- end
- object Cancel4: TButton
- Left = 322
- Top = 264
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 2
- OnClick = Cancel1Click
- end
- object LedLadder2: TLedLadder
- Left = 183
- Top = 118
- Width = 21
- Height = 98
- LedCount = 14
- Min = 0
- Position = 0
- end
- object CancelBox4: TCheckBox
- Left = 8
- Top = 248
- Width = 97
- Height = 17
- Caption = 'CancelBox4'
- TabOrder = 4
- Visible = False
- end
- end
- object TabSheet5: TTabSheet
- Caption = 'TabSheet5'
- TabVisible = False
- object NoSoundPic: TImage
- Left = 196
- Top = 96
- Width = 133
- Height = 133
- Picture.Data = {<image000.bmp>}
- Stretch = True
- Transparent = True
- end
- object Bevel4: TBevel
- Left = 8
- Top = 245
- Width = 393
- Height = 7
- Shape = bsBottomLine
- end
- object Label12: TLabel
- Left = 155
- Top = 10
- Width = 230
- Height = 77
- AutoSize = False
- Caption =
- 'After you hear the beep, please do not speak into your microphon' +
- 'e. Please note You will have to wait about 5 seconds before the' +
- ' '#39'Next >'#39' push button is enabled.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- WordWrap = True
- end
- object Back5: TButton
- Left = 160
- Top = 264
- Width = 75
- Height = 25
- Caption = '< Back'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = Back5Click
- end
- object Next5: TButton
- Left = 236
- Top = 264
- Width = 75
- Height = 25
- Caption = 'Next >'
- Default = True
- Enabled = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = Next5Click
- end
- object Cancel5: TButton
- Left = 322
- Top = 264
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 2
- OnClick = Cancel1Click
- end
- end
- object TabSheet6: TTabSheet
- Caption = 'TabSheet6'
- TabVisible = False
- object Label6: TLabel
- Left = 155
- Top = 10
- Width = 230
- Height = 131
- AutoSize = False
- Caption =
- 'All done setting up your sound system. Please note: If you chang' +
- 'e mixer controls after running this wizard, you will probably ex' +
- 'perience problems with voice command recording. If in the future' +
- ' you experience voice command recording problems please run'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- Transparent = True
- WordWrap = True
- end
- object Bevel6: TBevel
- Left = 8
- Top = 245
- Width = 393
- Height = 7
- Shape = bsBottomLine
- end
- object Label10: TLabel
- Left = 155
- Top = 122
- Width = 230
- Height = 51
- AutoSize = False
- Caption = 'this wizard again. Please click on '#39'Finish'#39'.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- Transparent = True
- WordWrap = True
- end
- object Back6: TButton
- Left = 160
- Top = 264
- Width = 75
- Height = 25
- Caption = '< Back'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = Back6Click
- end
- object Finish6: TButton
- Left = 236
- Top = 264
- Width = 75
- Height = 25
- Caption = 'Finish'
- Default = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = Finish6Click
- end
- object Cancel6: TButton
- Left = 322
- Top = 264
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 2
- OnClick = Cancel1Click
- end
- end
- end
- object WizardPanel: TPanel
- Left = 10
- Top = 15
- Width = 133
- Height = 229
- BevelInner = bvLowered
- Color = clTeal
- TabOrder = 1
- object WizardPic: TImage
- Left = 2
- Top = 2
- Width = 129
- Height = 225
- Align = alClient
- AutoSize = True
- Center = True
- Picture.Data = {<image001.bmp>}
- Stretch = True
- Transparent = True
- end
- end
- object Panel1: TPanel
- Left = 10
- Top = 272
- Width = 149
- Height = 29
- BevelOuter = bvNone
- TabOrder = 2
- object Ver: TLabel
- Left = 0
- Top = 16
- Width = 149
- Height = 13
- Align = alBottom
- AutoSize = False
- Transparent = True
- end
- end
- object MeterData1: TMeterData
- Active = True
- Left = 74
- Top = 250
- end
- object MidiMixer1: TMidiMixer
- MidiDeviceID = -2
- Left = 45
- Top = 250
- end
- object MeterTimer1: TTimer
- Enabled = False
- Interval = 50
- OnTimer = MeterTimer1Timer
- Left = 14
- Top = 250
- end
- object gVersion: TVersionInfo
- Left = 102
- Top = 250
- end
- end
-